module P6Extensions
    where
import ExprDataTypes
import Extras


genCodigo ((Incremento a),mt) vs n lqedm = genCodigo a vs n mt ++ mPush 1 ++ mAdd ++ codCoercion mt lqedm
genCodigo ((Decremento a),mt) vs n lqedm  = genCodigo a vs n mt ++ mPush 1 ++ mSub ++ codCoercion mt lqedm
